home *** CD-ROM | disk | FTP | other *** search
/ European High School Girl / European High School Girl.iso / pc / prg / sofie.dxr / 00081.ls < prev    next >
Encoding:
Text File  |  1996-03-08  |  317 b   |  18 lines
  1. on mouseDown
  2.   global soundflg
  3.   set the ink of sprite 18 to 4
  4.   updateStage()
  5.   repeat while the stillDown
  6.     nothing()
  7.   end repeat
  8.   set the ink of sprite 18 to 0
  9.   updateStage()
  10.   if soundflg = 0 then
  11.     set soundflg to 1
  12.     puppetSound("SOFI.AIF")
  13.   else
  14.     set soundflg to 0
  15.     puppetSound(0)
  16.   end if
  17. end
  18.